﻿module HyperF.Init

let mutable internal credentials_domain : string = null
let mutable internal credentials_userName : string = null
let mutable internal credentials_password : string = null

let init_credentials domain user password =
  credentials_domain <- domain
  credentials_userName <- user
  credentials_password <- password